home *** CD-ROM | disk | FTP | other *** search
/ Workbench Add-On / Workbench Add-On - Volume 1.iso / DiskUtil / CD-ROM / CD-Player / install < prev    next >
Encoding:
Text File  |  1995-08-23  |  756 b   |  34 lines
  1. (if (= @language "deutsch")
  2.     (
  3.         (SET Intro  "Wilkommen zum Installer-Script für CD-Player")
  4.         (SET Where  "Wohin soll das CD-Player-Packet hinkopiert werden ? Es wird ein Verzeichnis namens CD-Player angelegt")
  5.     )
  6. )
  7. (if (= @language "english")
  8.     (
  9.         (SET Intro  "Welcome to the installer-script for CD-Player")
  10.         (SET Where  "Where do you want to place the CD-Player-package ? A drawer called CD-Player will be created")
  11.     )
  12. )
  13.  
  14. (MESSAGE Intro)
  15.  
  16. (SET WUWU
  17.     (ASKDIR
  18.         (PROMPT Where)
  19.         (DEFAULT "sys:")
  20.         (HELP   "")
  21.     )
  22. )
  23.  
  24. (SET BinDest (TACKON WUWU "CD-Player"))
  25.  
  26. (RUN (CAT "makedir \""BinDest"\""))
  27.  
  28. (COPYFILES
  29.     (SOURCE ":DiskUtil/CD-ROM/CD-Player/")
  30.     (DEST   BinDest)
  31.     (ALL)
  32.     (INFOS)
  33. )
  34.